CLASS zcl_cds_test_roc01 DEFINITION
  PUBLIC
  FINAL
  CREATE PUBLIC .

  PUBLIC SECTION.

    INTERFACES if_oo_adt_classrun .
  PROTECTED SECTION.
  PRIVATE SECTION.
ENDCLASS.



CLASS zcl_cds_test_roc01 IMPLEMENTATION.


  METHOD if_oo_adt_classrun~main.

    out->write( 'Test for CDS view' ).

    SELECT
      *
      FROM zroc_cds_new( p_travelid = '00000001' )
      INTO TABLE @DATA(lt_cds_new).


    out->write( lt_cds_new ).

  ENDMETHOD.
ENDCLASS.
